home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD School House 9
/
CD School House 9.0 - Wayzata Technology (1994).iso
/
mac
/
MAC
/
School House
/
Misc.
/
Save the Planet 1991 2.11
/
background_45939.txt
< prev
next >
Wrap
Text File
|
1991-05-30
|
4KB
|
160 lines
-- background: 45939 from stack: in.11
-- bmap block id: 46145
-- flags: 4000
-- background id: 0
-- name:
-- part 1 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=26 top=165 right=264 bottom=346
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 22
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 2 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=324 top=70 right=136 bottom=507
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=476 top=21 right=57 bottom=512
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
visual effect iris close
pop card
end mouseUp
-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=411 top=21 right=54 bottom=443
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
visual effect wipe left
go to previous card
end mouseUp
-- part 6 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=444 top=21 right=54 bottom=475
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
visual effect wipe right
go to next card
end mouseUp
-- part 7 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=332 top=27 right=50 bottom=403
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Select
----- HyperTalk script -----
on mouseUp
set cursor to watch
put " " into blanks
put blanks &" " & line 1 of card field 1 of card "address" into line 1 of field 1 of card "letter"
put blanks &" " & line 2 of card field 1 of card "address" into line 2 of field 1 of card "letter"
put blanks &" " & line 3 of card field 1 of card "address" into line 3 of field 1 of card "letter"
put "" into line 4 of field 1 of card "letter"
put the long date into temp
put blanks & second item of temp & "," & third item of temp into line 5 of field 1 of card "letter"
put "" into line 6 of field 1 of card "letter"
put line 1 of field 1 into line 7 of field 1 of card "letter"
put line 2 of field 1 into line 8 of field 1 of card "letter"
put line 3 of field 1 into line 9 of field 1 of card "letter"
put "" into line 10 of field 1 of card "letter"
put line 6 of field 1 into line 11 of field 1 of card "letter"
put "" into line 12 of field 1 of card "letter"
put "" into line 13 of field 1 of card "letter"
put "" into line 14 of field 1 of card "letter"
put "" into line 15 of field 1 of card "letter"
put "Sincerely," into line 16 of field 1 of card "letter"
put "" into line 17 of field 1 of card "letter"
put "" into line 18 of field 1 of card "letter"
put line 1 of card field 1 of card "address" into line 19 of field 1 of card "letter"
put "" into line 20 of field 1 of card "letter"
put "" into line 21 of field 1 of card "letter"
put "" into line 22 of field 1 of card "letter"
put "" into line 23 of field 1 of card "letter"
put "" into line 24 of field 1 of card "letter"
set cursor to hand
go to card "letter"
end mouseUp
-- part 9 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=444 top=55 right=70 bottom=475
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
show 7 cards
end mouseUp